Option Explicit
Sub J_Sample005()
    Dim myFilename As String
    Const Ttl1 As String = "ϤJ"
    Const Ttl2 As String = "}ɮ"
    myFilename = Application.GetOpenFilename(Title:=Ttl1)
    myFilename = Application.GetOpenFilename(Title:=Ttl2)
End Sub
